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GENERAL DESCRIPTION 


After a brief description of memory management for B6ASIC 
Slanguage progratss this product specification describes the 
operators generated by the 81800/81700 BASIC Compiler. Operators 
are classified by type and indexed ty their mnemonic 
abbreviations. | | | 


RELATED DOCUMENTATION 


Name Number 
BASIC Coapiter Pe. Se 2212 5280 


Burroughs Corporate Standard for BASIC 
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c SANTA BARBARA PLANT Pe. S- 2210 0135 (0) | 


BASE wn of ee wen ec csoc creer assoeswen {= ~- own ee 2 wo @ oo & 


, VARIABLE SPACE 
STATIC MEMORY 
NUMBER STACK 


(NOT CVERLAYAS8LE) j 


STRING STACK | 

<2 - = + + = SAY BE EXTERCED 
WITH "S" CARD 
AT COMPILE TIME 


VIRTUAL MEMORY ARRAY SPACE 
STRING SPACE 


COVERLAYASLE ) 


‘ 
! 
J 
: 
! 
i 
i 
i 
i 
! 
: 
1 
i 
i 


LIMI To < broeen noone nn nn ee eererrts = 2 2 7 7 7 7 7 EXTENDABLE AT BOJ- 
' i | 
1 RUN STRUCTURE NUCLEUS | 
! | | 4 


4 { 
; S“CODE i 
i | 7 


Figure 1.1 BASIC Object Program Memory Layout 


SEETHER EERE Meenmare seers: 
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VIRTUAL MEMORY 


§ PAGE SIZE 1 PAGE CONTENTS i DESCRIPTION 


feces ee woeseen J eee cee cece ae wees ew aces] come en eee oem mmm ccc ace | 


f 6448 Bits ! Numeric array space { Numeric values. 
64*48 Bits String array space String descriptors which 
: point into the string 
| SPpace@e 
File parameter tables Internat file tables. 
Data statement elements } 
String constants 


{ 

| 

{ 

1 64248 Bits 
$512*8 Bits 
§512*8 Bits String constants fror 

i source. 

i Space for generation of 
4 new strings. 

i 


a> ep wih ee ab fe we ae 
a a GQ an am am as ath ab 


51228 Bits String space 


Figure 1.3 Virtual Memory Layout Ordered According to the 
Data Dictionary Entries 


RUN STRUCTURE NUCLEUS 


The RS.NUCLEUS is Located immediatety above the data defined by 


the program’s tisit register. The RS -NUCLEUS contains. 


infermation necessary for the MCP and the interpreter to execute 
the programe Consuit current MCP documentation for further 


information. 


The following 24 bit parameters are inctuded in the FS.NUCLEUS. 


These paraseters»s in the order givens are placed in the 
scratchpad disk seqweent of the object program ty the comapiter anc 


are maintained tn the RSeMeMACHINE area of the RS.NUCLEUS by the 


BASIC interpreter which updates them whenever control 1s 
transferred to the MCP. | 


Number stack address 


Base-retlative bit address of the start of the number stacke 


‘Stack Length resairing © 


Cne plus the length of the remaining stack space Cin bits). 


Stcing stack address 


7 Baserrelative bit address of the start of the string stack. 


Deta from data statenents. 


i 


i 
d 
§ 
i 
4 
i 
t 
| 
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The foilowing is a desc 
terns which wifi be use 
used to describe itess 


Static memory 
Cata tabie 
Numeric var 
String vari 
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FORMATS 


ription of data itess and definition of 
d throughout this manual. <A List of teras 
found in memory is siven below. 


jabies 
abies 


Numeric array descrirctors 


String arra 


Stack 
Number stac 
Nugeric 
Nugeric 
Numeric 
Numeric 
Numeric 
Nugeric 


y descriptors 


reali value 

inteser value 
base-relative address 
virtual address. 
array pointer 

array descriptor 


Return control word 


String stac 
String 
String 
String 
String 
String 
String 


Virtual memory 


k 
non=self-relative descriptor 
self~relattve descriptor 


baserreilative address 


virtual address 
array pointer 
array descriptor 


Numeric array elesents 


String array el 
File paraneter 


egents 
tables 


| Data statement character strings and string constants 
7 Free string space 


‘QEEINITION OF TERMS 
Base-relative address 


Virtual address 


Page 


Displacement 


2t= Bit displacement from absolute bit 


address contained in base register | 


22= Page displacement 
33= Data dictionary entry number 


2t= Word displacesent from beginning of 


cata 


‘ 
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SANTA BARBARA PLANT : : | Pe Se 2210 0135 (D) 
inter aaa string parameter address bit (05) 


% Word displacement above the base- 
% relative address contained in the 
% internal string perameter register. 


Internal string Local address bit (05) 
Z Word displaceswent bvetow the base- 
Z relative address contained in the 
ZX internal string péerameter register. 


STACK CORMAT 


The number stack is composed of two parts: 
two 48 bit registers» Ccatied A.~REG and B.REG in the interpreter) 
the number stack portion of static memory 

If the A register is net empty» itt is considered the top of the 

stack. If the A register is empty and the B register is not 


empty» the 8 register is considered the top of the stack. If 
they are both empty» the top of the stack is in static memory 


The string stack is cosposed of two parts: 
one 48 bit register (called STRING.~TOP tn the interpreter ) 


the string stack portion of static meaory 


The two stacks reside in static memory and grow toward each 
other. The length cf these two stacks is a program parameter. 
PeReearnes at runtige. 


NUMBER STACK 


The following items could be on the number stack. 
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01 NUNERIC VIRTUAL ADDRESS 


oe eee red eee eee eee eee 


O14 


4 OOLL 4 i | 4 
TYPE ACORESS 
02 TYPE B1T(04) x 3 
O02 FILLER B811€02) 
O02 ADDRESS B1T(18) % WIRTUAL ADDRESS 
O03 PAGE 81T¢€12) % DATA DICTIONARY ENTRY NUMBER 


02 


03 DISP 
FILLER 


BITCO6) 


z 


WORD DISPLACEMENT FROM BEGINNING CF PAGE 


O02 FILLER 


BIT(C24) 


NUMERIC ARRAY PCINTER 


Ted Salata! Dal Sal atatatated €: Ctatetatal feted. tatetatetel 


10100 1 3 { 4 
TYPE ACORESS 
02 TYPE BITC04) 2% & 
02 FILLER BITCO2) % | 
02 ADDRESS BITC(18) 2% BASE“RELATIVE ADDRESS 
BITC€24) | 


NUMERIC ARRAY DESCRIPTOR 


Porhroe fo 2e fom hewe lobed ornl fore §onmn] Qree fees 1Geccloo*17<---f 


101012 1 | ‘ i i 
TYPE CCD CRD ADDRESS MSY 
02 TYPE BITCO4) 2% 5 
2 FILLER BITC02) we 
02 CCD BIT(18) 2% CURRENT COLUMN DIMENSIGON (FOR AC2+5)32=6) 
02 4 BITCOL? 2% NOT A MATRIX SWITCH (FOR AC2»5)22=0) | 
02 CRD BIT(18) % CURRENT ROW DIMENSION (FOR AC265)22=3) 
02 ADCRESS BI11€18) % VIRTUAL ADDRESS 
O03 PAGE 811€12) 2% DATA DICTIONARY ENTRY NUMBER 
03 DISP BITCOG). % WORD DISPLACENENT FROM BEGINNING OF PAGE 
02 MSV BITC18) % MAXIMUM SUBSCRIPT VALUE CFOR AC2¢5)22=18) 


i 
fd 

i 
a 
a 
} 
* 
: 
ft 
@ 
ie 
ie 
E 
: 
i 
i 
fe 
rl 
a 
mt 
ue 
i 
; 
a 
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The 


01 


01 


STRING STACK 


foilowing items could be 


on the string stack. 


STRING NON-SELF-RELATIVE DESCRIPTOR 
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foe hme fonh cee [oo ewe] Geen] fof corm eeren Zp owrre= { 


1000 1 


{ { 


ADDRESS 


TYPE 


TYPE 
FILLER 
STRLEN 
FILLER 
ADDRESS 


O03 PAGE 


03 DISP 


STR-LEN 


BITCO4) 
BIT(04) 
BiT¢16) 
BIT(03) 
BiTc21) 
BIT(€i2) 
BITC09) 


ve BE BE BE 


8 


STRING LENGTH IN CHARACTERS 


VIRTUAL 


ADDRESS 


DATA DICTIONARY ENTRY NUMBER : 
CHARACTER DISPLACEMENT FROM BEGINNING 


OF PAGE. 


STRING SELF-RELATIVE DESCRIPTOR 


isibaou (iogeeepussgcce radeeee a osseesuey 


Dk ee ee ee Oe ES OK EO OE Oe OO a OE eB BE 2 Oe OE Oe 8 OB eB 8 


1002 @# 9001 1? 


TYPE 
O02 TYPE 


Q2 TYPE.2 


02 CHAR 


(O01 


92 


FILLER 


TYPE.2 CHAR 


BIT(CC4&) 
BLIY¢04) 
BIT(08) 
BIT(32) 


z 9 
Za i 
x 7 


STRING BASE-RELATIVE ADDRESS 


frwhrerefoeZoefeerwree | feoeoce ae] ence a 74 cowuna| 


22 OBESE SOO Be BEET BOO OH OE 88D OS OD Oe 6 GO eG € eS © EE SG ws 


! 1010 1 


02 
02 


02 


TYPE 


FILLER 
O02 ADDRESS 


FILLER 


ACDRESS 


B1TC04) 
BITC02) 
BITC18) 
BITC 24) 


% 10 


HE DESCRIBED SELFTRELATIVE STRING 


% BASE“RELATIVE ADDRESS 


LEMS ft 


IRR arenk er af e Waren 
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“SZINSTRUCTION EQRMAT 


Fach BASIC S-instruction consists of a variable tength S-oper ator 


followed by a variable nusber of arguments. 


S-operators are 2» 5 or & bits in Length with the most frequently) 
used S-operators (con a static basis) being coded with the 
smailest number cf bits. The fength of the operator is 
determined by the cperator itseif as follows: 


| j j { { | i 

§ 10 1 a occcod ¢ o100cdgdocod 3 

1 to 4] 4 to 4 a | to § 

§ ui 4 4 ccii1 1 +%|[1112111 #1 

i j { { } | 
2 BIT 5 stt | a 8 BIT 


GPERATOR OPERATOR | CPERATOR 


Fach argument can consists of a variable number of bits. The 
format and interpretation of these arguments are described in 
Getail with the description cf the individual cperators. | 


| | 3-1 
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ADDRESS DECODING 


‘ARRAY ADDRESS DECODING 


Arrays may be referenced by address» value or by a pointer to an 
array descriptor. If the referencing is by address or values the 
folilcwing is true: | | . | 


IN When referencing a global array» the argument to the opcode 
is a data table address. when referencing an externat array 
the argument to the opcode is a stack address. In both 
cases» this cperand address is used to ottain an absolute 

bit address pointing to the array descriptor. The top of 
the number stack contains the subscript(s) of the element of 
the array being referenced. | 


CUT: The array descriptor and the subscript(s) to the array are 
used to obtain a virtual address. If the array is being 
referenced by address» this address is toaded to the top of 
the stack after type bits designating a virtual address are 
appended to the teft. If the array is teing referenced by 
vaiues the actuat vaiue of the array element Ca numeric 
value of string descriptor) is toaded to the top of the 
appropriate stack. A fatal “INVALID SUBSCRIPT" error is 
generated if the subscriopt(s) are tess than zero or greater 
than cr equai to the array bounds vatue in the array 
descriptor. | 


If the reference is by a pointer to an array descriptor» the 
following is true: 


INs The argument to the opcode contains a data table address cr 
a stack adaress. In either cases this operand address is 
used tc obtain a baserrelative bit address pointing to the 
array descriptor. | 


CUT: Type bits designating an array pointer (numeric or string) 
are appended toe the feft of the array descriptor address. — 
This array fpointer is toaded to the top of the appropriate 
stack. — | | | 


Fn liaenae 
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ei 
A 
| 
zat 
Mid 
wa 
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ANSIRUCTION SET 


ARITHMETIC OPERATIONS 


MNEMONIC 


ADO 
suB 
MPY 
CIV 
CSGN 


PSGN 


FLT 


FIX 


CONV 


RAT 


MNEMONIC 


 MNEMONIC 


STNX 


3T8 


NAME 


ADD 
SUBTRACT 
MULTIPLY 


~DPIVIDE 


COMPLEMENT SIGN 
SET SIGN POSITIVE 
FLOAT 

FIX 
CONVERT TO DECIMAL 


ROUND AND TRUNCATE 


SIACK OPERATIONS 


NAME 


EXCHANGE 
PUSH NUMERIC ZEROS 


PUSH NULL STRINGS 


STORE OPERATIONS 


NAME 


STORE NUMERIC SPECIAL 


STORE iTS 


OPCOOE 


~—6O0OLL 


o1coceci 


010000190 


01000011 
010600111 
01C010C0 
01001010 


010010C1 


01¢01¢C0C0 


O110C01C1 


“OPCODE 


01001111 


01010011 
01100010 


OPCODE 


OL0OCICI 


01001110 


Pe Se 2210 0135 (D0) 


ARGUMENT 


ARGUMENT 


6 BIT OPERANE 


6 BIT GPERAND 


ARGUMENT 


CE ee Im aim we aie aap a 


1 BIT OPERAND 


BURROUGHS CORPORATION 


COMPUTER SYSTEMS GROUP 


SANTA BARBARA PLANT 


LIT 


—-7ERO 


CNE 
SLEN 


ALAC 


LARGE LITERAL 

LOAD ZERO 

LOAD ONE 

LOAD STRING LENGTH 


ARRAY LOAD ADDRESS 
FOR COMMUNICATE 


BRANCH OPERATIONS 


MNEMONIC 


FOR 


NEXT 


CN 


BUN 


CALL 


-RTRN 


BXXX 


CXXX 


COMM 


NAME 


FOR 


NEXT 


CASE 


BRANCH UNCONDITIONAL 


CALL 
RETURN 


BRANCH CONDITIONAL 


COMPARE NUMERIC AND 


BRANCH CONDITIONAL 


COMMUNICATE 
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010006C0 
011010C1 
01101010 
01011011 


01¢6111€0 


CPCODE 


01001011. 


01C0C1C0 


C1C001C0 


00110 


00000 


011000C 
01101011 
C0101 


01010001 


P. Se 2210 0135 (0) 


40 BIT OPERAND 


9 BIT OPERANT 


ARGUMENT 


THE ENTIRE “NEXT™ 
INSTRUCTION IS THE 
OPCODE TO *FCR* 


12 BIT OPERAND~1 
12 SIT OPERAKD.2 
16 SIT OPERAND.3 


6 BIT CPERANC.1 
18 BIT OPERAND.2 


18 BIT OPERANO.N 


1 BIT CPERAND.1 
12 OR 18 BIT 
OPERAND 2 


2 BIT OPERAND.1 
12 OR 18 BIT 
OPERAND .2 


3 BIT OPERANO.1 
5 BIT GPERAND.2 
5 BIT GPERANCD.3 


i BIT OPERANC.1 
i2 OR 18 BIT 
OPERAND.2 


1 B1T CPERANE.1 


42 OR 18 BIT 
OPERAND.2 
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SIQPERATIONS 


ARITEMETIC OPERATIONS 


OPERATION: 


Perform the 


~—AQR 
QUBTRACT 
MULTIPLY 
QIVICE 
TO SESSTASCSSESCLCCAESS LS. £2. Ss ee 
# ADD» SUB» MPYs» CIV. « 
KHKKEKRKEAREKARAARKAKAHE 
| FORMAT: kkkkhkkkakk&hhkae nk 
€ | ADD * 00011 «* 
7 SUB * CidggcooLi 
MPY «* Ci000gdgico * 
Div * Cicogogi11 * 
khekkhk&keahakk et 
OPCODE 
INS NUMBER STACK TOP 73= ARGUMENT.1 
NUMBER STACK TOP-1 33= ARGUMENT.2 
ARGUMENT.1 33= NUMERIC REAL VALUE 
| ARGUMENT .2 | ss= NUMERIC REAL VALUE 
gut: NUMBER STACK TOP st= RESULT 
| RESULT t3= NUMERIC REAL VALUE 


indicated alsebraic operation with ARGUMENT.1 and. 


ARGUMENT.2 and reptace them with the resuit. In subtractions 
ARGUMENT.1 7s subtracted from ARGUMENT.2. In divisicns 


ARGUMENT<1 is divided into ARGUMENT.2. If the exponent of the 
result overfious of underfilowss or if during diviston ARGUMENT.1. 
is equal te zeres a runtime error is generated. 


Fm SEM SF Eo a tal in es STIS oS FES SS Oc 
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COMPLEMENT SiSN 


REKKKEAKS 
* CSGA * 


kReazAnganran rh 


FORMATS xxennkaaxnnen 


*® 01000111 « 


Reerekerexkereene 
OPCOCE 
IN? NUMBER STACK TOP t= NUMERIC REAL VALUE 


cut: NUMBER STACK TOP t= NUMERIC REAL VALUE 


OPERATIONS 


Complement the sign of the value on the top of the stack (i.ee»s 
change a pesitive vaiue to a negative vatue and visa versa). 


SEEDS EY PREREPERER 


PUREE CREEP EET REDE LC EPGnr? 
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FLOAT 


* FLT * 


KAAKAAKSR 


FORMAYT2 sr aanaennnannat 


# 01001010 *« 


kkkek&ehk hhh 
OPCODE 
IN: NUMBER STACK TOP <ss= ARGUMENT 
ARGUMENT s3= NUMERIC INTEGER VALUE 
CuT: NUMBER STACK TOP 3s= RESULT 


RESULT t= NUMERIC. REAL VALUE 


OPERATIONS 


Replace the argument with its numeric reali vatue equivatlente 


This is handled by shifting the integer Z places to the left; 
supplying 2Z trailing zero bits and suppiying an exponent equat te 


— 30724256. Z equais the number of teading zero bits in the 


integer. If the exponent part of the argument is not equat te 
zero» then resuitt = argument. 


RARAKRAK 


’ LP 7 “i © 5-7 
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ROUND AND TRUNCATE 


* RAT * 


kKaARRREAR 


FORMAT: aektenenaneen 


* 01100101 « 

i SHEEERKEKKEE 

: OPCODE 

IN? - NUNBER STACK TOP == ARGUNENT 
ARGUMENT 23= NUMERIC REAL VALUE 
GUT § NUMBER STACK TOP z:= RESULT 

RESULT 22= NUMERIC INTEGER VALUE 
CPERATION: 


Replace the arguaent with its integer value equivalents rouncec 
and truncateds using the following algoritha: 


IF ARGUMENT < 0.5 
THEN IF ARGUMENT <= “0.5 Z 
THEN RETURN A NUMERIC INTEGER VALUE OF MINUS INFINITY 
- ELSE RETURN A NUMERIC INTEGER VALUE OF ZERO. 
If ARGUMENT > 2**24-1 
THEN RETURN A NUMERIC INTEGER VALUE OF PLUS INFINITY 
ELSE RETURN A FIXCINTCSTACK.TOP ¢ 0.5)) 


i! 
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PUSH NUMERIC ZEROS 


RaRKRKARR 


* PSHN * 


RaAEKDKRAK 


-eRePAERARAELALALE SEAR EES SY 


* 01010011 * a 


KRREARRAKARAEREARARERHKARE 


OPCODE OPERAND 


FORMAT? j*~e 8 awsanwfococe 5 wowmnw | 


i 


CUT s NUMBER STACK TOP 23= NUMERIC VALUE CF ZERC 


i 


NUMERIC VALUE OF ZERO 


@ @. 


NUMBER STACK TOP-1 3: 


® @ 


CPERATION: 


Push ali occupied hardware number stack registers to memory. 


Then push as many numeric value zeros onto the top of the memory 
portion of the nusber stack as are indicated by the value of the 


operand. 
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STORE OPERATIONS 


STORE B1IS 


KARA AER 


« STR «* 


L 
E : 7 KARKREK 
i 
¥ 


FORMAT: s--- 8 -=--4 
: = TrrrTTT Tritt 
i * OLOO0LLIO « 
werrrrret tf 


OPCOCE 


ADDRESS 


IN: NUMBER STACK TOP 33 
NUMBER STACK TOP-1 :2= OFFSET 
NUMBER STACK TOP=-2 :s= LENGTH 
| NUMBER STACK TOP-3 33= DATA 
i € ADDRESS 23= NUMERIC VIRTUAL ADDRESS 
| 1 NUMERIC BASE-RELATIVE ADDRESS 
; OFFSET 2t= NUMERIC REAL VALUE | 
LENGTH $t= NUMERIC REAL VALUE LEQ 48 
BATA ss= BIT STRING 


QUT: ALL FOUR ITEMS ARE REMOVED FROM THE STACK 
CPERATION: 


Store a fieid of the bits found in DATA into the given ADDRESS. 
The OFFSET is intecserized and added to the ADDRESS. This is used 
as the starting bit position of the requested bit fieid. The 
LENGTH is intecgerized and used as the length of the bit string. 
If LENGTH is fess than the length of datas the rightmost bits of 
CATA are storec. 


ty 


i. 
ves! 
24 
i 
ce 
vt 
4 
7 i 
ml 
ah 
Ga 
ae! 
a. t 
a 
an 
cal 
ae 

\ 
od 
wid 
eat 
al 
ed 
ot 
Send 
ay 
or 
g..4 
I 
oa 
ma 
ine 
mf 
ce | 
e's 
Mee 
“ia 
2 
ies 

i 
ar) 
a 
bye 
a 
at 

4 
itl 
aA 
m1 
i 
A 
is 

J 
ie 

" 
az 
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STGRE NUMERIC SPECIAL 


kkennhak 
* STANK * 


ekkeaAXKKRKAE K 


FORMAT: jooe 8 ween jowe i oom § 

: RMARAARRKAAAAKRARRAREAEKREEEK 
: * 01000101 * * 
RekKARKKARARRAAKKERERKRRKK 


OPCODE OPERAND 


INS IF THE OPERAND = 1 : 
THEN NUNBER STACK TOP s 
NUMBER STACK TOP-1 ; 
If THE OPERAND = C€ 
THEN NUMBER STACK TOP s3= SOURCE VALUE 
NUMBER STACK TOP-1 22= DESTINATION ADDRESS 


= DESTINATION ADDRESS 
= SOURCE VALUE 


; DESTINATION ADDRESS st= NUMERIC BASE-RELATIVE ACCRESS 
6 | NUMERIC VIRTUAL ADDRESS 
SOURCE VALUE :t= NUMERIC REAL VALUE 

‘cuts REMOVE NUMBER STACK TOP 


IF THE OPERAND = 1 
THEN REMOVE NUMBER STACK TOP-1 


CPERATION: 


Store the source value into the destination address. 


rusmnnnasias 
# 


s$0f See SITS SPE Se a SS SRE eT STS HT Tere 


‘wueidiabet CORPORATION 


COMPUTER SYSTEMS. GROUP 
SANTA BARBARA PLANT 


LOAD OPERATIONS 
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ARRAY LOAD ALDRESS FOR COMMUNICATE 


RRARREARKRHARKKAKAKERKRAKK 


# QOLOL1L100 * * 


rRESELALESELRASASA LES ES 


OCPCOCE OPERAND 


Re khaae t 


* ALAC * 


RHKARRRS 


CPERAND 33= CATA TABLE ADDRESS POINTING TO THE ARRAY DESCRIPTOR 


INS NUMBER STACK TOP £3= 

NUMBER STACK TGP*1i 23s= 
CUTS | NUMBER STACK TOP 23: 
GOPERATION: 


Use the array descriptor pointed 


SUBSCRIPT 
CSUBSCRIPT} 


BASE“RELATIVE ADDRESS 


to by the operand and the 


subscript(s) te cbtain a numeric virtuat address of the array 
element being referenced. This numeric virtual address is used 
to make the appropriate page present. A base-retative address» 
pointing into the dynamic memory areas replaces the subscript on 


the number stack. <A fatal "INVALIO 


SUBSCRIPT* error is generated 


if the subscript(s) are less than zero or greater than or equal 
to the maximum subscript value in the array descriptor. | 


: sty =. _ > ; 5-17 
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LOAD SIRING CONSTANT 


* LSC * 


KaRKKKS 


FORMAT:  §--- 8 aaae jloeooe 7 ecawe force 21 oaman § 


BRARARAEARAARKKAARAEAAARARKRAKAAERARARARHKARKEE 


* 01010101 * * & 


RK RARAAKRARARAEKEARKARARARAKKAKRKAARRKAKRKARRE 


OPCODE GCPERAND.1 OPERAND 2 


OPERAND.1 22= STRING LENGTH | 
OPERANO.2 s2= STRING VIRTUAL ADDRESS 
CPERATION: 


Use OPERAND.1 and OPERAND.2 to create a string non-self-relative 
descriptor and Aicad it tc the top of the string stack. 
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LGAD EXTERNAL NUMERIC ARRAY 


KeRARRAR 


* LENA * 


REAKRAKRKE 


RAKKKEAKAEARAREKAAKAKARARAEARKARERKAAREKE 
* O1011000 *« ® * 
Hea RE RH AEKKRKERAARKHERERAAERKAK 


OPCOCE OPERAND.1 OPERAND «2 


OPERAND.1 | OPERAND.2 i TYPE OF LCGAD 
See awe e | wees enw eee coer eam weee a came awe ana | meen wow eec casa wow eewee= 
000 i Data table address f Numeric array pointer 
001 t Data table address a Numeric array pointer 
010 § External numeric local addressi Virtual address 
d O11 f External numeric parameter ( Virtual address 
- a address | i 
: | 100 f External numeric iocat address! Numeric real vatue 
4 5) | Ol i External numeric parameter 4 Numeric reat value 
| { address } 
110 a External numeric tocal addressi Virtual address 
Lil 2 External numeric paraweter { Virtual address 
7 address i 
INS | = NUMBER STACK TOP 3 SUBSCRIPT 


NUMBER STACK TOP"1 3s= ESUBSCRIPTI 


OUT: = NUMBER STACK TOP 33= NUMERIC ARRAY POINTER 
| 1 NUMERIC WERTUAL ADDRESS 
| § NUMERIC REAL WALUE 
THE SUBSCRIPTCS) ARE REMOVED FROM THE NUMBER STACK 


CPERATIONS: 


If bits 1 and 2 cf OPERAND.1 are not both 0 then convert 
CPERAND.2 to a basexretative address pointing to the numeric 
array descriptore With this descriptor and the subscript(s) 
construct a numeric virtual address of the referenced array 
element. If OPERAND.1 specifies a toad address then the numeric 
vwirtuail address is toaded to the top of the number stack. If 
~OQPERAND.21 specifies a icad vatiue then the contents of the virtuai 
address are toadcec te the top of the number stack. A fatal 
PINVALIG SUBSCRIPT" error is generated if the subscript(s) are. 
fess than zere cr greater than or equai to the maximua Se 
walue in the numeric array descriptor. 
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“LOAD EXTERNAL SIRING ARRAY 


Teer re Ts 
* LESA * 


KRaeazareeaenkananh 


FORMAT: je--- & anne foowe 3 ee er 9 alteiedinad | 
: RRR AERA AREEERKEREKREERRARKAKE 
 @ QLOLICOC « * ® 

TEA TITTLIC ITT TTT TTT ETT TLE TTT TTT TTL 


OPCOOE OPERAND.1 OPERAND .z 


OPERANDe1! OPERAND-2 { TYPE OF LOAD 


see eocnens | wea waco wee wea ae wn enwo ee nm emcees aeaan | scene eee acces come eee ceoas 
000 i Data table address | 1 String array pceinter 
O01 § Data tabie address 1 String array pointer | 
010 1! External string tocal address 1 String virtual accress | 
O11 4 External string parameter address 1 String virtual acdress 
100 4 Externai string iccal address 1 String descriptor 
101 § External string parameter address { String descriptor 
110 { External string tocal address i String descriptor 
Lif § External string parameter address 1 String descriptor 

INs NUMBER STACK TOP 33= SUBSCRIPT 
| NUMBER STACK TOP-1 s3= CSUBSCRIPT] 

QuT: | STRING STACK TOP 2:= STRING ARRAY POINTER 

| | 1 STRING VIRTUAL ADDRESS 

f STRING DESCRIPTOR 
THE SUBSCRIPT(S) ARE REMOVED FROM THE NUMBER STACK 


CPERATIONS 


If bits 1 and 2 of OPERAND<1 are not both 0 then convert 
OCPERAND.2 to a baserrelative address pointing to the string array 
descriptor. With this descriptor and the subscript €s) construct 


a string virtual address of the referenced array element. If 
QPERAND.1 specifies a toad address then a string virtual address 
is loaded to the tcp of the string stack. A fatat “"INVALIC 


SUBSCRIPT” error is generated if the subscript(s) are fess than 
zero or greater than or equal to the maximum subscript vatue n 
the numeric aeray cescriptor. 


If bits 1 and 2 cf CPERAND.~1 are both C then convert OPERAND.2 to 

| a base-reltat ive addresse Append the type bits designating a 
String array pointer to the left of this base-relative address 
and toad it onto the top cf the string stacke — 


ach! 
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LOAD GLOBAL SIRING ARRAY 


REARAKRKEA | 


* LGSA * 

ARERKRARKAKK 
FORMAT 4 j-<-= 8 owne j a am 3 sewn | aonoe 9 wooum j 
ERAS ERSREREALELS EASES ESET ESS SERS SE S 


* 02011000 * - & 


RAERRARRKAKRAKRARAKRAHRAKKARHKEKEKHKEAEKEARAKE 


~OPCODE OPERAND.1 OPERAND .2 


OPERAND-1 §  OPERAND.2 ‘ TYPE OF LOAD 


lata tatetetatatatated Lebatadetatetatetatenetehatatatatatetetatatad Katalatatatetetetahetatetetetetetetheetateeateneene 
000 § Data table address 4 String array pointer 
001 i Gata table address i String array pointer 
010 i Data table address i String virtual address 
O11  § Data table address § String virtual address 
100 —{ Data table address i String descriptor 
101 § Data table address i String descriptor 
110 i Data table address ! String descriptor 
111 { Data table address 1 String descriptor 
INS NUMBER STACK TOP 23= SUBSCRIPT 
_ NUMBER STACK TOP-"1 s3= [SUBSCRIPT] 
CUT: STRING STACK TOP sce STRING ARRAY POINTER 
: § STRING VIRTUAL ADDRESS 
2 STRING DESCRIPTOR 
THE SUBSCRIPTCS) ARE REMOVED FROM THE NUMBER STACK 
OPERATION: 


If bits 1 and 2 of OPERAND.~1 are not hoth OO then convert. 
GCPERAND.-2 to a base-relative address pointing to the string array 
descriptor. with thas descriptor and the subscript{(s) construct 
@ string virtuat address of the referenced array element. If 
OPERAND.1 specifies a toad address then a string virtual address 
1S Loaded to the ten of the string stack. {ff OPERAND.~1 specifies 
@ toad walue then the contents of the virtual address are icaded | 
tc the top cof the string stack. A fatai “INVALID SUBSCRIPT" 
error is generated if the subscript(s) are tess than zero ofr 
greater than or equai tc the maximum subscript vaiue in the 
numeric array descriptor. | 


If bits 1 and 2 of GPERANO.1 are both C then convert OPERAND.2 to | 
a baserrelative address. Aorend the type bits desigqnating a 

string array pointer to the teft of this baser-relative address 
and doad it ontc the top cf the string stack. , 
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LARGE LITERAL 


kahh hth 
* LIT »* 


RkRARARAKEK 


FORMAT? $or= 8 creednn= 40 -H=3 


SReKAKREKRHRAHRAKAKKEAREKKAKKEKK EK 


* 91000000 * t 


ARARAKAARARARAEAKEKRARKRARKKKAKKEKK 


OPCODE OPERAND 


OPERAND s= 40 BIT LITERAL (1 SIGN3 9 EXPONENT? 
30 FRACTION BITS) 
CUT: |= NUMBER STACK TOP 2:= NUMERIC REAL VALLE 
OPERATION: 


Use the operand to create a numeric reat velue and toad it to the 
top of the number stack. | | 
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LOAD NUMERIC SCALAR 


K€RARKALR 


* LNS * 


RakRKAKRAR 


_ FORMATS «feo 2 endeee 3 ennt--- 5 OR 9 He 

| | - TES ESC ISOSESLS ESOS CELLS SS EP ECS LEE SS 
j | te a ke) t t t 
: | RARER KEAERAERKAEREKRAEEEKKRKKERAEEERAKRS 


| | ss SPCODE «6OPERAND.1 OPERAND.2 


OCPERAND.1 i | OPE ante 1 TYPE OF LCAC 
sea esenetooa jaeocos = ABE OADEERABEBODneeaaenae sec ece ame awocwas Jaw woemecencoe 
000 i 9-bit cata table address i Address 
001 § S-bit data tabie address i Address 
010 4 Sebit internal numeric tocat address ! Address 
O11 i S-bit internat numeric parameter address ! Address 
100 i 99-bit data table address | ! Vatue 
101 t Se-bit data table address ! Value 
€ 110 § S-bit tnternatl numeric tocat address {i Vatue 
ail i S-bit internal numeric parameter address 1 Yailue 
CuTs: NUMBER STACK TOP s3= DATA TABLE ADDRESS 
1 INTERNAL NUMERIC LOCAL ADORESS 
1 INTERNAL NUMERIC PARAMETER ACDRESS 
4 NUMERIC REAL VALUE 
OPERATION: 


Load an address cr vaiue to the top of the nunmter stack. 


nd 


4 
by 
aa 
a 
fd 
on 
e 
a 
2 
| 
veh 
ed 
E 
ad 
Hired 
bad 
ma 
4 
a 
of 
#1 
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LOAD SEQUENCE NUMBER 


FORMATS xt eakaeaakener 


* 01100111 * 


kRkaeKkKRKKKKaAS 


OPCODE 


OPERATION: © 
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RKARARAKRKK 


* LS * 


kKkKkkRKE 


Load the last stored sequence number to the top of the number 


stack as a numeric integer value. 


m8 


oa 
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LOAD SIRING SCALAR 


FORMAT: {7-- 5 eefWwe-- 4 asaemwefoce 5 OR 9 wae | 
CREEK EKAREKEREEEREEKHKEEEHAKEEEHEAE SD 


& O0i1 * ® tk 


RRR REKEREREKKEAEREKERENEKEHEK 


OCPCOCE OPERAND.»1 OPERAND.2 


CPERAND.1 1 OPERAND.2. 
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aReRRKRKKE 
* LSS * 


kKaARARAK 


TYPE OF LCAT . 

cennmanewoa locates eee es Se ee awe meme mam wowocamannoees fees wae tem waa esrancaeseae 
Baserrelative accress 
Basersretlative adcress 
Baserrelative address 
Base-~relative adaress 
Basemrelative address 
Base-retlative address 


9900 1! Data tabtie address 1 
~—60001 § Oata tabie address q 
0010 i Internal string parameter address | 
0011 i Internal string tocal address | 
0100 i External string parameter address 1! 
0101 i Externai string local address i 
1000 § Data table address § String 
1001 i} Data tabie address § String 
1010 f Internal string parameter address ! String 
1011 f Internat string tocai address { String 
1100 ! External string parameter address 1! String 
1101 i External string tocal address { String 


CUT: STRING STACK TOP s:= S8ASE“RELATIVE ADDRESS 
| 1 STRING DESCRIPTOR 


OPERATION: 


descriptor oa 


descriptor 
descriptor 
descriptor 
descriptor 
descriptor. 


Load the base-relative address of a string descriptor or the 
string descriptor tc the tcp of the string stack. 
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“LOAG SIRING LENGIE 
e&EX¥RRAKR K 


* SLE * 


kKkakkaKAR LK 


FORMAT: j--- 8 oone | 
RRR KKKKKE 
* O10L1011 « 
 MaERRKRARARKR KKK 


OPCODE 
IN? STRING STACK TOP :2= STRING DESCRIPTOR 
OUT: NUMBER STACK TOP s:= NUMERIC REAL VALUE 


THE STRING DESCRIPTOR IS REMOVED FROM THE TOP OF THE 
STRING STACK 


CPERATION: 


Extract the wrelns length from the string descriptor on the top 
of the string stack and load it as a positive numeric reat vatue 
onto the top of the number stack. 
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LOAD ZERO 
| ke kacnkankt 


* ZERC * 


RkkKRAKKE 


FORMAT: I--- 8 =-==] 
| kRitthkhhkkhkhht 
1  # 01101001 « 
, KRkkeKKKKKEKE 


OPCODE 


OPERATION: 


load a numeric real value cf zero to the tep of the number stack. 


PROSE UP ECrEPl es PPE Perec oe ais Le etsy Cee he ty Sele a PEE we OR eR Es Pe ene an ES Ba go eae Poe tel por Ree Coste ete es toca etc 0 RD RSS a SOE Ne Pe eee ey ca, ae nL, Pe ER Pe Ps prey ot SOR ae SE ee ae 3 ae ERGY eo ARG OR eee eee gr ete 


JEL REE PEE ARE REEGLTL BEE BEETLE EBSET EPSee 
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BRANCH CONDITIONAL 


FORMAT: t--- 8 <---1- 


SaAAEAEHRARKEARKEK 


* QO1101011 * 


RakkakkkK EHKREKKRKK 


OPCODE 


QPERAND.1 32= 
OPERAND.2 23= 
OPERAND.3 33= 


CPERATION: 


‘Compare the BRANCH.MA 
toggiese If any "CONE 


corresponding “*OQNE* 
next instruction from 
unsigned binary inte 
of the current cede 
instruction. 


The following table 
required tc implement 


BGTR 


R = 001 = 
BLSS = 010 = 
BNEQ = 011 = 
BEQL = 100 = 
BGEQ = 101 = 
BLEQ = 11C = 


If OLSPLACEMENT.FLAG 
BRANCH. DISPLACEMENT va 
lange 
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ReEAKAKARARKR 


* BOXXX »* 


KeKKKKEKKRK 


eon F eeeedecn= 1 sceet-- 12 OR 18 =< 
CREEK EEEERERRREREEEREERRREEREREKKEAEKE 

& * & 
eer eS Sere eee eT eT eT Te TTT TT ETE T TTT TTT 


OPERAND.1 OPERAND.Z OPERAND.3 


BRANCH.MASK 
DISPLACEMENT .FLAG 
BRANCH.DISPLACEMENT 


SK tc the current setting of the relationat 
"bit in the BRANCH.MASK is matched by a 


bit tn the relational toggles» select the 


the address determined by adding the 
ger BRANCH.DISPLACEMENT to the base address 
segments, otherwise terminate the 


sivas the binary vatiues of the BRANCH.MASK 
the given branch type. 


GREATER THAN 

LESS THAN 

NOT EQUAL 

EQUAL 

GREATER THAN OR EQUAL 
LESS THAN OR EQUAL | 


= ls then the length of the 
iue is 18 bits; otherwisere it is 12 bits 
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parameter registers CENPR and ESPR) point to the parameters of 
the routine where the function is defined. 


When executing the return statement» the fields in the RCW 
containing the previous contents of the parameter registers are 
stored in the parameter registers. In this way» the operating 
environment is restored to its condition prior to the tast call. 


_ The format of the return controt word is as fotiows: 


bos hme dee 2 me bene 25 mann dee 17 weber 17 meter 17 mrten 14 oot 
RRARAKAEKAEKRAKAKRAEBRARAEKARARERARARAKRERKAKKEAAKERAKARKRKRAKEKHEARKRAKEAKEAARE 
* 1111 * RCW.T *« RTN.ADDR * P.RCR * P.NPR * P.SPR *® 02.2.0 * 


RARARRAEAARKAARAREKREKKAREKARKRARRAEARKEHKARAARAEARAAEKRARARAAERAKERKEAARKEKRKHKRRERK 


KCW.T 23= 00 INTERNAL SUBROUTINE 
| Ol .INTERNAL FUNCTION 

10 EXTERNAL SUBROUTINE 
11 EXTERNAL FUNCTION 


FTNsADOR s:= 7 BIT SEGMENT DICTIONARY ENTRY NUMBER 
© | 18 BIT DISPLACEMENT FROM BEGINNING OF SEGNENT 
P.RCR s2= THE CONTENTS OF THE RETURN CONTROL REGISTER ASSOCIATED 
° WITH THE PREVIOUS CALL | 
P.NPR ot= IF THE CALL IS TO AN INTERNAL SUSROUTINE THEN P.NPR 1S 
NOT USED. 


IF THE CALL IS TO AN INTERNAL FUNCTION THEN PeNPR 
CONTAINS THE CONTENTS OF THE INTERNAL NUMERIC 
PARAMETER REGISTER CENPR) ASSOCIATED WITH THE 
PREVIOUS CALL. | 

THE CALL IS TO AN EXTERNAL SUBROUTINE OR FUNCTION 
THEN P.NPR CONTAINS THE CONTENTS OF THE EXTERNAL 
STRING PARAMETER REGISTER CESPR) ASSOCIATED WITH 
TRE PREVIOUS CALL. 


“73 


I 


P.SPR s3= IF THE CALL 13 TO AN INTERNAL SUBROUTINE THEN P. SPR Is 
| | NCT USED. : 
IF THe CA@L IS TO AN INTERNAL FUNCTION THEN P.SPR 
CONTAINS THE CONTENTS OF THE INTERNAL STRING 
PARAMETER REGISTER CAUNSPR) ASSOCIATED WITH THE 
PREVIOUS CALL. : 
TF THE CALL IS 70 AN EXTERNAL SUBROUTINE OR FUNCTICR 
THEN P.SPR CONTAINS THE CONTENTS OF THE EXTERNAL 
STRING PARAMETER REGISTER CESFR) ASSOCIATED WITH 
THE PREVIOUS CALL. 


aye f 
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COMPARE IWO SIRINGS 


RREDRAAR 
* CMFS * 


REKRAKRAKRKH 


FORMAT: RAKKERRKREKKE 
* OLOLLLI11 « 
kaekkaeahkaenkat 


OPCODE 


IN2 STRING STACK TOP 


: TRING DESCRIPTOR 
STRING STACK TOP“1 3: 


3s= § 

s= STRING DESCRIPTOR 

CUT: BOTH STRING DESCRIPTORS ARE REMOVED FROM THE TOP CF THE 
STRING STACK 


CPERATION: 


© Compare two strings» as described by the two string descrirtors 
on the top of the string stack» to each other until they compare 
unequal or until cre of the strings is finished. 


If they compare unequal» then the relational toggles are set to 
: indicate whether the second string is less than or greater than 
aa the first string. | 


If they compare equa& untit one of the strings is finished» then 

the relational toqgies are set to “LESS THAN" if the seceand 

string is sherter; to "GREATER THAN" if the second string is 
fongers or to "EQUAL" if the twe strings have equal tength. 
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— COMMUNICATE 


REARKAKARAN. 


* COMM « 


RRHEKKEKKK 


FORMAT seanexaxnane 


* O101L0001 * 


RARKHRKARARAKK 


OPCODE 


OPERATION: 


Load the 48 bit RS.~COMMUNICATE.MSG.PRT area of the RS.~NUCLEUS 
with an SDicrtype data descriptor indicatins a length of 120 bits 
and containing the absoctute address of the data table. This 
first 120 bits of the data-table is reserved for use as a 
communicate message area. 


Mad 


¢ The format of this SDL-type data descriptor is as follows: 


fraaa 8 pons faoscee 16 sonen | conn awe 24 cowcaan | 


ae et ee re eae, 


AREER RE REREEARERREEEEEEERREERERRERHKKERKRAREN 
# YYPE * LENGTH * ABSOLLTE ADDRESS * 
® 9100 0000 * 00.-0111100C0 * OF DATA-TABLE * 


TARARKEKAEARKKRARAKAKRERAKKKAKKERAERAEREKARRARKREKKKKEKREKRKE 


Store the status cf the M-machine in the appropriate parts of 
this program’s RS.NUCLEUS. Oe 


4 


Instate the progras (GISMO) whose RS.NUCLEUS address is given in 
the RS-COMMUNICATE.LR field of this program’s RS.~NUCLEUS. 


yo 4 | or: : 5°45 
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 £QR 


Karz 2KRA&KSE 
* FCR * 


kaakkahkKa 


FORMAT: jose 8 ence] ocas 8 saen fj woa 12 mwelone i2 wom foam 18 awe j 
RRARKKAKEREKREKRAKARARARKEREERKEARAKARAEARAKARAREKAKAKRKKAKARKKAARARR SE 
* 01001012 * QL1001100 x . * | * t 
SRAeKAKARRARAKRARRARERAREKAKARAKARAKRAKREKREARRERKEKAKAAAARAKKEAEKKAKAKAR 


OPCODE OPCODECNEXT) OPERAND.~1 OPERAND.2 OPERAND.3 


LCOP INDEX ADDRESS 


OPERAND.1 23 : 
OPERAND.Z 22= LOOP PARAPYETER ADDRESS 
OPERAND. 3 $2 | 


LOOP ENDING ADDRESS 


BASE“RELATIVE ADDRESS 
BASE“RELATIVE ADDRESS 
CODE LOCATION 


LOOP INDEX ADDRESS 
LOGP PARAMETERS ADORESS 
LOOP ENDING ADDRESS 


6@ «8 ¢0 
oe 80 08 
hou W 


STEP .SIZE 
ENDING INDEX VALUE 
BEGINNING INDEX VALUE 


© IN: NUMBER STACK TOP 
: NUMBER STACK TOP=1 
NUMBER STACK TOP~2 


1 oe | 


ry on < ey | 
oe @8 #86 


CUT: ALL THREE ITEMS ARE REMOVED FROM THE TOP CF THE NUMBER 
| STACK. 


CPERATION?: 


: Store the STEP.~SIZE and then the ENDING.INDEX.VALUE into the data 
: | table at the locaticn specified by the LOOP.PARAMETERS.ADDRESS. 
i | Store the @EGINNING.INDEX.~VALUE in the data tabie at the location 
: —_ specified by § the LOOP. INDE X.~ADDRESS. Compare the 
PEGINNING. INDEX.VALUE with the ENDING.INDEX.VALUE. | 


The toop its satisfied if» for a positive STEP. SIZE> the 
BEGINNING. INDEX.VALUE is greater than the ENDING.INDEXVALUES or 
for a negative STEP.SIZE» the BEGINNING INDEX-YVALUE is @ess than 
the ENDING.j INDEX. VALUE. 7 


If the doop is not satisfied» the instruction following the "FCR* 
instruction ts then selected. If the loop is satisfied» the next 
instruction is selecteq from the code location specified by the 
LOCP.ENDING.ADDRESS.. | 


‘ so 4 5°47 
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CASE 
RUEARARK 
* GN «a. 
kkeaka tk 
FORMAT: {~ne 8 ee 6 waalone 18 aaa | jece 12 aaa | 
RARAAKAREKARARARKKRARKEKAEKREKAKHRAKKREKK REAKKAKRAKEKEK 
* O1900010C « t Sweewe® tk 
KRRREARAAKEKRKAKRARAKRAKKKRAEKKAKKARKKKKKKEKSE KXKKAKKRARKKXKER 
CPCCOE OPERAND.1 OPERAND.2 OPERAND.N 
OPERAND.1 t= NUMBER.OF ADDRESSES 
| OPERAND.2 | 23= BRANCH.CISPLACEMENT.ONE 
OPERAND.N 22= BRANCH DISPLACEMENT .N 
| 
i NUMBER.OF.ADDRESSES 23:= 6 BIT BINARY INTEGER 
@ BRANCH.DISPLACEMENT.X ss= 18 BIT BINARY INTEGER 
| IN: | NUMBER STACK TOP 73s= NUMERIC REAL VALUE 
CUT: THE NUMERIC REAL VWALUE IS REMOVED FROM THE NUMBER STACK. 
: CPERATION: 
Select the next instruction from the tlecation determined by. 
| adding the branch cisplacement to the base address of the current 
; _ coce segmert. 


The particular BRANCH.DISPLACEMENT to be used is determined by 
the rounded and truncated value of the numeric reai value found. 
on the top of the rnumsber stacks t.e.» STACK TOP 2:2= IRCCSTACK.TCP 
+ 0.5). | 


if this vatue is tess than one or greater than OPERAND.i»> a 
runtime error is generated. 


thes 
ae 
ei 

a 

a 
_ 
aa 
: 
_ 
et 
Ei 
i 
sd 
E 
> 
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EXTRACT A SIRING 


kkhhethan 
* EXTS « | 


t€kek&aeRnrknke 


FORMAT? Reehaenknehak 
‘ * 91011001 * 


RRRKeKAKKKKaK 


OPCCOE 


STRING NON-SELF-RELATIVE 
DESCRIPTOR 

BEGINNING CHARACTER FOSITION 
ENDING CHARACTER PCSITICK 


IN: STRING STACK TOP 


ee 
60 


NUMBER STACK TOP 
NUMBER STACK TOP-1 


6e 
"ou 


oe 66 
oe 


BEGINNING CHARACTER POSITION 
ENDING CHARACTER POSITION 


NUMERIC REAL VALUE 
NUMERIC REAL VALUE 


ou 


ee 60 


ee ¢6 


STRING NON@*SELF “RELATIVE 


CUT: STRING STACK TOP tt= | 
_ | DESCRIPTOR | 
THE NUMBER STACK IS RETURNED TO 11S CONDITICN PRICR TC 
THIS S-OP. | | | 
OPERATION: 


Convert the string descriptor on the top of the string stack to a 
sub-string of itself» as indicated by the beginning and ending 
character position values found on the top of the number stack. 


If either the beginning character position vatue initiattly 
incicates a character positicn preceding the first character in 
the input strings cr the ending character position vatue | 
Initially incicates a character position foiltlowing the tLast. 
character in the input strings it is first adjusted to potnt just. 
inside the string. Ife after any necessary adjustments» they 
overiape then the top cf the string stack is converted to a nuff. . 
string descriptor. 


+ ‘> * - | . : | | 5-51 
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MAKE A SIRING DESCRIP IOR 
RERAKERER & 


 WRRARARSE 


FORMAT: Rhkhaekhkkekkhe 


| * OLOLIOIC » 
: kRakkkkakk&hkikt 
! | OPCODE 


s= ARRAY ADDRESS 
3= OFFSET 
s= STRING LENGTH 


IN: NUMBER STACK TOP 
NUMBER STACK TOP- 
NUMBER STACK TOP- 


f\) 


ARRAY ADORESS f2= NUMERIC VIRTUAL ADDRESS 
OFFSET s3= NUMERIC REAL VALUE 
STRING LENGTH | 33= NUMERIC REAL VALUE 


OPERATIONS 


Spas se ee a 


This Sop was designed to be used when. compiling an intrinsic. 
Cne of its uses is to convert the buffer area (Can array) to a 
string descripter. | 


Convert the array address» the cffset and the string dength to a 
string descriptor which is left on the top of the string stack. 
Remove the three iteas from the top of the number stack. | 


CEE TAEEY ECP SECS EEPSor eee RE? SUEGEPE Ren ee BEEP EEO See Se ce Sg ry eRe ea Were eae a ay eS Zhe Oe ara ee ee 


* *SCS *# 


Tetra Ce EEE a a Sead 
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SANTA BARBARA PLANT 


NOVE STRING CHARACTERS 


FORMAT: 


Out: 


OFFSET 


RkKAKKREKKKKKE 


* 01011101 « 


eRaRRKKKEERES 


OPCOOE 
STRING STACK TOP i= 
STRING STACK TOP“1 22= 
NUMBER STACK TOP ::= 


DESTINATION H 
SCURCE 7 : 


Keaenaeith tk 


* MVSC * 


Ahkhehkanann 


DESTINATION 
SOURCE 


OFFSET 


STRING NON“SELF-RELATIVE DESCRIPTCK 
STRING NON-SELF-RELATIVE DESCRIPTCR 
NUMERIC REAL VALUE WHICH IS THE 
CHARACTER OFFSET INTO THE DESTINATION 
FIELD WHERE THE FIRST SOURCE CHARACTER 
IS TO BE MOVED. ) a 


THE TWO DESCRIPTORS ARE REMOVED FROM THE TOP OF THE 
STRING STACK. THE NUMBER STACK CONTAINS THE UPDATED 
OFFSET» EQUAL TO THE INPUT OFFSET PLUS THE NUMBER OF 


CHARACTERS MOVED. 


CPERATION: 


Move the characters fror 
cestination string. 


the source string to the area of the 


, ° . 

a ee = 5°55 
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: oe 


SCAN STRING 
oe RaERKRRES 


* SCAN * 


kKe¥AKRARAR 


Sag a Ga ga cel HE ett tine BE, a ae le 2 ea lt a A Pel aL Ai i a a Sie bE 


FORMAT: f--- 8 -<"<4--= 2 <-=1 


ARRARRAHERREHEEKRKKKKK 
* 01100110 = Z 
ARKH HRKEKKKEKRERKRKKE 
| 

:  OPCODE OPERAND 

i | 

| 

: CPERATION: 


The saurce statement which causes creation of this Sop tocks 
like this: | 


SCAN CAS» I> FWD» EQ» DS» R$» J) 


AS 33= STRING TO BE SCANNED 
I 222 CHARACTER POSITION AT WHICH TC BEGIN 
FWD = FORWARD OR REVERSE 
EQ 2= EGL OR NEQ 
D$ 2:= CHARACTER FOR WHICH TO SCAN 
RS. t2= IF 08 FOUND THEN OS ELSE ** 
JS  :%s= IF DS FOUND THEN CHARACTER POSITION OF DS ELSE 0 


The stacks tock like this pricr to executicn of the S-op: 
STRING STACK NUMBER STACK 


$s TOP ::= 1! 
cs 


After execution? 
TOP 2:= 08 OR *™* TOP ::= CHAR POSITICN OF DS 


CPERAND CFIRST BIT) 3c: 


1 FORWARDS O REVERSE | 
(SECOND BIT) 1 £Q3 ; 


0 NEQ 


BURROUGHS CORPORATION _ 
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IRAE AND SAVE SEQUENCE NUMBER 


RRAARRAAKAEAKARERREKKEEE 
* OLLOLLI11 * | * 


RKARKARARAKRAEREAEKRKEAKKKEAEK 


OPCODE $$ OPERAND 


OPERATION: 


5° oT 
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Kekkkeene 
* TSSA * 


kKkaekhkak t& 


Save the sequence number stored in the 17 tit operand in static 
memory word 27. °#£=Set up for a catl to the ERR intrinsic with a 
parameter of 52 which teiis ERR to print the sequence nuaber anc 


continue. 


on 


BURROUGHS CORPORATION 
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INDEX 


ADD sO S-2 | 
ADDRESS DECODING 3-1 


— ALAC S745 


ARITHMETIC OPERATIONS 


ARRAY ADDRESS DECOCING 


IX-1 
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4-1 
haus | 


ARRAY LOAD ADDRESS FOR COMMUNICATE > aa ee ie 


~~ BRANCH AND COMPARE OPERATIONS 5°56 


BRANCH CONDITIONAL ae Ff 


ERANCH OPERATIONS 4-3 


BRANCH UNCONDITIONAL 
BUN 5-36 
BXXX 5-37 


CALL 5-38 
CASE S47 
CMPS) 5-41 
CMPX 5-44 
CMSL 5-42 
COMM = 5-43 


COMMUNICATE 5°43 


3° 36 


CCMPARE NUMERIC ANC BRANCH CONDITIONAL 3744 


COMPARE STRING LITERAL 


COMPARE THO STRINGS 
COMPLEMENT SIGN 5-3 
CONV 5-2 


CONVERT TO DECIMAL one 


CSGN o73 


~PBUG 5748 


DEBUG 3°48 
DEFINITION OF TERMS 
DIV 571 

DIVIDE 5=4 

EXCH 578 

EXCHANGE 278 


EXTRACT A STRING 5°49 


EXTS 5749 
F IX 57h 
FLOAT 2 aa 
FLT 5-5 
FGOR 5°45 


FORMATS 2-1 
GENERAL CESCRIPTION 


HMON 5-50 
INSTRUCTION SET 4-1 
LARGE LITERAL 5-25 
LDB 5-16 a 
LOCR 5-18 

LENA 5°19 


3742 


3741 


eni 


4st 
HARDWARE MGNITOR 5-50 
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ROUND AND TRUNCATE 5-7 


FTRN 5-40 | 
RUN STRUCTURE NUCLEUS 1-5 
S*INSTRUCTION FORMAT 2-9 
S“OPERATIONS S-1 
SAVE SEQUENCE NUMBER 5-56 
SCALAR VARIABLES 3-2 
SCAN 5°55 
SCAN STRING 5-55 
SET SIGN POSITIVE 5-6 
SLEN 5°33 
SLIT 5-34 
SMALL LITERAL 5-34 
SSN 5°56 , 
STACK FORMAT 2-3 
STACK OPERATIONS 4-1» 5-8 
S$T8 5711 
STN 5-12 
STNX 5°13. 

STORE BITS S11 
“STORE NUMERIC 5-12 | 
STORE NUMERIC SPECIAL 5-123 
STGRE OPERATIONS 4-lk» 5-11 
STGRE STRING 5-14 | 


STRING STACK 2-7 
SUB S=2 
SUBTRACT 5-1 


TRACE ANDO SAVE SEQUENCE NUMBER 


TSSN 


5-57 | | 
ZERO 


5°35 


aay 


Axess 
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